home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Grab Bag
/
Shareware Grab Bag.iso
/
001
/
ledfix.pqs
/
lefix.pas
Wrap
Pascal/Delphi Source File
|
1986-01-14
|
1KB
|
37 lines
Program LEFix;
{This module patches the Leading Edge Model D interrupt
table to direct interrupt 33 (hexadecimal) from the
Leading Edge ROM interrupt trap to a RETI instruction in
the Leading Edge ROM. This makes Reflex run on the
Leading Edge Model D (providing you've put some more
RAM into it!) properly. You also need to construct an
AUTOEXEC.BAT something like this:
VERIFY ON
NOTE Previous line part of belt and suspenders engineering
LEFIX
SET REFLEX=HERC
REFLEX
In addition, put in Borland's patch for Hercules graphics using
ANSI.SYS; the video setup works correctly then!
Charles L. Perrin
CompuServe 70275,1301
17 December 1985
PS: I *KNOW* that the program can be written in a much shorter
format using Assembly Language, but I avoid such stringently!
Anyway, it gives you an excuse to fire up TURBO PASCAL!}
Begin
Mem[0:$0CC] := $023;
Mem[0:$0CD] := $0FC;
Write('Change installed in interrupt table....');
End.